Top 10k strings from Tasquad - Quadratic Equations (1983)(Tasman Software)(16k).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   2 g$=w$+g$(3
   2 ;"try this>>";
   2 ;"          "
   2                               
   1 yn=-gn/fn:
   1 xn=-en/dn:
   1 v(y)+"x +"+
   1 v(y)+"x "+
   1 v(i)=t(i):
   1 u(y)+"x +"+
   1 u(y)+"x "+
   1 u(i)=s(i):
   1 to continue
   1 tbsquad   
   1 tasquad   q
   1 tape then it has  over-run the
   1 t(i)=-t(i):
   1 stopped it.
   1 start of the next program.    
   1 s=t(x)*u(y):
   1 s=s(x)*v(y):
   1 s(i)=-s(i):
   1 s$="               ":
   1 p1,p2;c$;"x":
   1 o$="      ":
   1 if you mistype
   1 g=s(x)*v(y)+t(x)*u(y)
   1 g$=b$+x$+c$+" = 0":
   1 bn=en*fn+dn*gn:
   1 b$;x$;"= ";p3:
   1 a(h,yn)<b)
   1 a(g,yn)<b))
   1 a$;x$;" ";b$;x$;c$;" = 0":
   1 Type your name and press
   1 Type your answer and press
   1 Then press ENTER
   1 Tasquad has loaded
   1 Stop the tape then press ENTER
   1 Rewind the tape if you had not
   1 Print title page
   1 Play the tape
   1 If you mistype press
   1 If you have  not  stopped  the
   1 ;cn;" = ";s(x);" * ";t(x):
   1 ;an;" = ";u(x);" * ";v(x):
   1 ;"x =";"?";"           ":
   1 ;"TUTOR VERSION"
   1 ;"TASQUAD"
   1 ;"QUADRATIC EQUATIONS"
   1 ;"COPYRIGHT TASMAN SOFTWARE 1982"
   1 ;"        ";
   1 ;"        "
   1 ;"           ";
   1 ;"           ":
   1 ,,"The questions get more difficult"
   1 ,,"If you  get  one  wrong  I  will"
   1 ,,"I  am  going  to  set  you  some"
   1 *p3/p2))/100000
   1 (Caps shift 0)instead of ENTER
   1 (Caps shift 0)
   1 "until you have got eight right."
   1 "two values of  x)."
   1 "to work out  the  solutions (the"
   1 "the method.":
   1 "show you how to do  it  and  set":
   1 "quadratic  equations.   You  try"
   1 "how to do these  problems  enter"
   1 "any answers and I will show  you"
   1 "another - so if you do not  know"
   1 "Write down your own working  outfor each problem.  Then  if  youget the  answer  wrong  you  cancompare your working with  mine."
   1 "When  you  are  typing  in  youranswers:"
   1 "Try this one, ";n$;":":
   1 "If you get an answer  wrong  seeif you can find the  mistake  inyour working." 
   1 "Hello ";n$
   1 "Answer correct. Your score is ";in*a+jn+1
   1 "( x +  )( x +  )=0":
   1 "   point."
   1 "   Press the M key for a decimal":
   1 "   Press the J key for a minus."
   1 "   ";x$;"= ";p3;"/";p2:
   1 "   ";x$;"= ";(
   1  To try another press ENTER 
   1                V